home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / bbsutil / fwkcs117.zip / INSTALL.BAT < prev    next >
DOS Batch File  |  1992-02-12  |  5KB  |  153 lines
  1. @echo off
  2. if exist go.bat go
  3. cls
  4. echo - Part of FWKCS(TM) Contents_Signature System, Version 1.17.
  5. echo - (C)Copyright Frederick W. Kantor 1989-1992. All rights reserved.
  6. echo -
  7. echo - Your use of the FWKCS(TM) Contents_Signature System is at solely your own
  8. echo - risk. For safety, please have proper backups of your files.
  9. echo -
  10. echo - INSTALL.BAT to install the FWKCS(TM) Contents_Signature System, Ver. 1.17;
  11. echo -  for use in same directory with FWKCS117.ZIP, FWKCS.117, and FWKCS_TM.117.
  12. echo -
  13. echo - Note: Before you start the installation, please have available on your PATH:
  14. echo -         Phil Katz's PKUNZIP(R), Version 1.10 or later.
  15. echo -         Ben Baker's QSORT, Version 3.20.
  16. echo -        (IBM/MS) DOS 3.30-5.00, ATTRIB command.
  17. echo - (More information provided as FWKCS.117 package is opened; see README.TXT.)
  18. echo -
  19. echo -              If you are replacing FWKCS Ver. 1.12 or later, use REPLACE.BAT.
  20. echo -              ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  21. echo -
  22. echo -  Usage:     INSTALL "<enter>"
  23. if "%1" == "/*" goto end
  24. echo -
  25. echo -  If you are missing PKUNZIP, QSORT 3.20, or ATTRIB as above, stop now!
  26. echo -  To quit, press Ctrl+C, then y                               ~~~~~~~~
  27. echo -
  28. pause
  29. if not exist fwkcs117.zip goto nv117
  30. if exist #@!#@!^^.@!@ del #@!#@!^^.@!@ > nul
  31. if exist #@!#@!^^.@!@ attrib -r #@!#@!^^.@!@ > nul
  32. if exist #@!#@!^^.@!@ del #@!#@!^^.@!@ > nul
  33. if exist @@!#@!^^.@!@ del @@!#@!^^.@!@ > nul
  34. if exist @@!#@!^^.@!@ attrib -r @@!#@!^^.@!@ > nul
  35. if exist @@!#@!^^.@!@ del @@!#@!^^.@!@ > nul
  36. pkunzip @@!#@!^^.@!@ > nul
  37. if errorlevel 1 goto zex
  38. goto nz
  39. :zex
  40. echo sort test > #@!#@!^^.@!@
  41. qsort #@!#@!^^.@!@ @@!#@!^^.@!@ > nul
  42. del #@!#@!^^.@!@ > nul
  43. if not exist @@!#@!^^.@!@ goto nsrt
  44. cls
  45. del @@!#@!^^.@!@ > nul
  46. if not exist fwkcstmp.117 goto n1
  47. if exist fwkhi.com del fwkhi.com > nul
  48. if exist fwkhi.com attrib -r fwkhi.com > nul
  49. if exist fwkhi.com del fwkhi.com > nul
  50. pkunzip -o fwkcstmp.117 fwkhi.com > nul
  51. if exist fwkhi.com goto n2
  52. :n1
  53. if not exist fwkcs.117 goto nd
  54. if not exist fwkcs_tm.117 goto cm
  55. ren fwkcs_tm.117 fwkcs_tm.com > nul
  56. fwkcs_tm < fwkcs.117 >fwkcstmp.117
  57. if errorlevel 1 goto fbad
  58. ren fwkcs_tm.com fwkcs_tm.117 > nul
  59. pkunzip -o fwkcstmp.117 fwkhi.com > nul
  60. if not exist fwkhi.com goto fz
  61. :n2
  62. cls
  63. echo -
  64. echo -  Should I enter FWKCS117.ZIP's contents_signatures for future reference?
  65. echo -
  66. echo -    Press either 0 or 1 to answer:   0 = NO.  1 = YES.
  67. echo -
  68. :ask1
  69. fwkhi
  70. if errorlevel 2 goto ask1
  71. if not errorlevel 1 goto nocs
  72. if exist fwkcs117.zip ren fwkcs117.zip @@!#@!^^.@!@ > nul
  73. if exist fwkcstmp.117 ren fwkcstmp.117 fwkcs117.zip > nul
  74. pkunzip -o fwkcs117.zip fwkcs.com > nul
  75. fwkcs /1 fwkcs117.zip #@!#@!^^.@!@
  76. ren fwkcs117.zip fwkcstmp.117 > nul
  77. if exist @@!#@!^^.@!@ ren @@!#@!^^.@!@ fwkcs117.zip > nul
  78. if not exist fwkcs.com pkunzip fwkcs117.zip fwkcs.com > nul
  79. if exist fwkcs117.zip fwkcs /1 fwkcs117.zip >> #@!#@!^^.@!@
  80. qsort #@!#@!^^.@!@
  81. fwkcs #@!#@!^^.@!@ nul myowncsl.srt /ms
  82. del #@!#@!^^.@!@ > nul
  83. del fwkcs.com > nul
  84. :nocs
  85. pkunzip fwkcstmp.117 go.bat > nul
  86. if errorlevel 51 goto fz
  87. if errorlevel 50 goto ns
  88. if errorlevel 1 goto fz
  89. del fwkhi.com > nul
  90. go
  91. :nv117
  92. echo -
  93. echo -  INSTALL.BAT is for use in the same directory with all these
  94. echo -  files together:  FWKCS117.ZIP, FWKCS.117, and FWKCS_TM.117.
  95. goto try
  96. :ns
  97. del fwkcs117.tmp > nul
  98. echo -
  99. echo - There is apparently not enough space here for me to work in...
  100. echo -
  101. echo - After you have provided more space here, or moved my files to
  102. echo -   another drive with enough space,
  103. goto try
  104. :fz
  105. del fwkcs117.tmp > nul
  106. echo -
  107. echo - Error getting file(s).
  108. goto try
  109. :fbad
  110. del fwkcs117.tmp > nul
  111. ren fwkcs_tm.com fwkcs_tm.117 > nul
  112. echo -
  113. echo -  FWKCS.117 appears defective or incompatible. Execution aborted.
  114. :try
  115. echo -
  116. echo -  Please clean up, and try again. See README.TXT.
  117. goto end
  118. :nz
  119. echo -
  120. echo -  Where is Phil Katz's PKUNZIP(R)?
  121. goto nz1
  122. :nsrt
  123. echo -
  124. echo - Where is Ben Baker's QSORT Version 3.20 ?
  125. echo -
  126. echo -  You can get it as a no_fee download from The Invention Factory BBS
  127. echo -  on your first call:
  128. echo -
  129. echo -  generic  2400 bits/sec             212-431-1194  N 8 1
  130. echo -
  131. echo -  Hayes    (19.2K) (nominal 9600)    212-431-4508  N 8 1
  132. echo -
  133. echo -  USR      (19.2K) (nominal 9600)    212-274-8390  N 8 1
  134. echo -
  135. echo -  CompuCom (19.2K) (nominal 9600)    212-274-1243  N 8 1
  136. :nz1
  137. echo -
  138. echo -  After getting this missing program,
  139. echo -
  140. echo -           Please try again.
  141. goto end
  142. :cm
  143. echo -
  144. echo -  I need FWKCS_TM.117.
  145. echo -
  146. echo -        I quit!
  147. goto end
  148. :nd
  149. echo -
  150. echo -    Nothing to do!
  151. :end
  152. echo -
  153.